inherited frmBarcodeManage: TfrmBarcodeManage
  Left = 107
  Top = 120
  Caption = #26465#30721#31649#29702
  ClientHeight = 653
  ClientWidth = 1529
  PixelsPerInch = 96
  TextHeight = 12
  inherited tbdChildFormDock: TTBDock
    Width = 1529
    inherited tbrChildToolBar: TTBToolbar
      object tbtmAdd3: TTBItem [0]
        Action = actRefresh
        DisplayMode = nbdmImageAndText
      end
      object tbtmAdd1: TTBItem [1]
        Action = actAdd
        DisplayMode = nbdmImageAndText
      end
      object tbtmAdd2: TTBItem [2]
        Action = actPrint
        DisplayMode = nbdmImageAndText
      end
    end
  end
  object pnl1: TPanel [1]
    Left = 0
    Top = 42
    Width = 1529
    Height = 39
    Align = alTop
    Color = 16643306
    TabOrder = 1
    object lbl1: TLabel
      Left = 16
      Top = 11
      Width = 35
      Height = 14
      Caption = #26597#35810':'
      Color = clBtnFace
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object lbl2: TLabel
      Left = 64
      Top = 11
      Width = 28
      Height = 14
      Caption = #26085#26399
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object lbl3: TLabel
      Left = 313
      Top = 11
      Width = 28
      Height = 14
      Caption = #26465#30721
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object lbl5: TLabel
      Left = 187
      Top = 12
      Width = 6
      Height = 12
      Caption = '~'
    end
    object lbl8: TLabel
      Left = 509
      Top = 11
      Width = 42
      Height = 14
      Caption = #25209#27425#21495
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object lbl9: TLabel
      Left = 700
      Top = 11
      Width = 42
      Height = 14
      Caption = #20351#29992#21542
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object lbl10: TLabel
      Left = 820
      Top = 11
      Width = 42
      Height = 14
      Caption = #21015#21360#21542
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object edtBarcode: TEdit
      Left = 345
      Top = 8
      Width = 145
      Height = 20
      TabOrder = 0
    end
    object edtOrder_no: TEdit
      Left = 552
      Top = 8
      Width = 126
      Height = 20
      TabOrder = 1
    end
    object cbbUse_yn: TComboBox
      Left = 744
      Top = 8
      Width = 50
      Height = 20
      Style = csDropDownList
      ItemHeight = 12
      TabOrder = 2
      Items.Strings = (
        ''
        'Y'
        'N')
    end
    object cbbPrint_yn: TComboBox
      Left = 864
      Top = 8
      Width = 50
      Height = 20
      Style = csDropDownList
      ItemHeight = 12
      TabOrder = 3
      Items.Strings = (
        ''
        'Y'
        'N')
    end
    object edtEndDate: TDateEdit
      Left = 200
      Top = 8
      Width = 89
      Height = 21
      NumGlyphs = 2
      TabOrder = 4
    end
    object edtBeginDate: TDateEdit
      Left = 96
      Top = 8
      Width = 89
      Height = 21
      NumGlyphs = 2
      TabOrder = 5
    end
  end
  object pnl2: TPanel [2]
    Left = 0
    Top = 81
    Width = 1529
    Height = 39
    Align = alTop
    Color = 16643306
    TabOrder = 2
    object lbl4: TLabel
      Left = 16
      Top = 11
      Width = 35
      Height = 14
      Caption = #29983#25104':'
      Color = clBtnFace
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object lbl6: TLabel
      Left = 64
      Top = 11
      Width = 56
      Height = 14
      Caption = #26465#30721#31867#22411
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object lbl7: TLabel
      Left = 256
      Top = 11
      Width = 28
      Height = 14
      Caption = #25968#37327
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object edtbarcodetype: TListEdit
      Left = 136
      Top = 8
      Width = 105
      Height = 20
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      ListKey = 32
      ListShift = []
      FetchDataOnce = False
    end
    object edtqty: TEdit
      Left = 296
      Top = 8
      Width = 105
      Height = 20
      TabOrder = 1
      OnKeyPress = edtqtyKeyPress
    end
  end
  object grdBarcodeSno: TLeftDBEditGrid [3]
    Left = 0
    Top = 120
    Width = 1529
    Height = 533
    Align = alClient
    AllowedSelections = [gstRecordBookmarks, gstRectangle, gstAll]
    ColumnDefValues.AutoDropDown = True
    ColumnDefValues.Layout = tlCenter
    DataGrouping.GroupLevels = <>
    DataSource = dsBarcodeSno
    EditActions = [geaDeleteEh, geaSelectAllEh]
    Flat = True
    FooterColor = clWindow
    FooterFont.Charset = GB2312_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -12
    FooterFont.Name = #23435#20307
    FooterFont.Style = []
    Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
    OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghEnterAsTab, dghRowHighlight, dghDialogFind, dghColumnResize, dghColumnMove]
    ReadOnly = True
    RowDetailPanel.Color = clBtnFace
    RowHeight = 18
    RowSizingAllowed = True
    SumList.Active = True
    TabOrder = 3
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    UseMultiTitle = True
    Columns = <
      item
        EditButtons = <>
        FieldName = 'order_no'
        Footers = <>
      end
      item
        EditButtons = <>
        FieldName = 'sno'
        Footers = <>
      end
      item
        EditButtons = <>
        FieldName = 'barcode'
        Footers = <>
        Width = 140
      end
      item
        EditButtons = <>
        FieldName = 'barcode_type'
        Footers = <>
        Visible = False
        Width = 79
      end
      item
        EditButtons = <>
        FieldName = 'type_name'
        Footers = <>
        Width = 106
      end
      item
        EditButtons = <>
        FieldName = 'delete_flag'
        Footers = <>
        Width = 60
      end
      item
        EditButtons = <>
        FieldName = 'print_yn'
        Footers = <>
        Width = 60
      end
      item
        EditButtons = <>
        FieldName = 'print_date'
        Footers = <>
      end
      item
        EditButtons = <>
        FieldName = 'used_yn'
        Footers = <>
        Width = 60
      end
      item
        EditButtons = <>
        FieldName = 'process_status'
        Footers = <>
        Visible = False
      end
      item
        EditButtons = <>
        FieldName = 'operate_user_name'
        Footers = <>
        Width = 60
      end
      item
        EditButtons = <>
        FieldName = 'operate_datetime'
        Footers = <>
      end>
    object RowDetailData: TRowDetailPanelControlEh
    end
  end
  inherited aclChild: TActionList
    Left = 488
    Top = 200
    object actRefresh: TAction
      Caption = #21047#26032
      ImageIndex = 3
      OnExecute = actRefreshExecute
    end
    object actAdd: TAction
      Caption = #29983#25104#26465#30721
      ImageIndex = 10
      OnExecute = actAddExecute
    end
    object actPrint: TAction
      Caption = #26465#30721#21015#21360
      ImageIndex = 40
      OnExecute = actPrintExecute
    end
  end
  inherited img32: TImageList
    Left = 520
    Top = 200
  end
  inherited imgToolBar: TTBImageList
    Left = 456
    Top = 200
  end
  inherited imgToolBar16: TTBImageList
    Left = 456
    Top = 248
  end
  inherited img16: TImageList
    Left = 520
    Top = 248
  end
  inherited timAfterFromCreate: TTimer
    Left = 527
    Top = 300
  end
  object spGetBarcodeSno: TADOStoredProc
    Connection = dmPub.adcConn
    ProcedureName = 'Pro_GetBarcodeSno;1'
    Parameters = <
      item
        Name = '@RETURN_VALUE'
        DataType = ftInteger
        Direction = pdReturnValue
        Precision = 10
        Value = 0
      end
      item
        Name = '@stype'
        Attributes = [paNullable]
        DataType = ftString
        Size = 4
        Value = Null
      end
      item
        Name = '@suser'
        Attributes = [paNullable]
        DataType = ftString
        Size = 8
        Value = Null
      end
      item
        Name = '@snqty'
        Attributes = [paNullable]
        DataType = ftInteger
        Precision = 10
        Value = Null
      end
      item
        Name = '@order_no'
        Attributes = [paNullable]
        DataType = ftString
        Direction = pdOutput
        Size = 18
        Value = '%'
      end>
    Left = 384
    Top = 336
  end
  object dsBarcodeSno: TDataSource
    DataSet = cdsBarcodeSno
    Left = 383
    Top = 280
  end
  object cdsBarcodeSno: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftString
        Name = 'pid'
        ParamType = ptUnknown
      end
      item
        DataType = ftString
        Name = 'times'
        ParamType = ptUnknown
      end>
    ProviderName = 'dspBarcodeSno'
    AfterPost = cdsBarcodeSnoAfterPost
    Left = 383
    Top = 232
    object cdsBarcodeSnoorder_no: TStringField
      DisplayLabel = #25209#27425#21495
      FieldName = 'order_no'
      Size = 16
    end
    object cdsBarcodeSnosno: TIntegerField
      DisplayLabel = #24207#21495
      FieldName = 'sno'
    end
    object cdsBarcodeSnobarcode: TStringField
      DisplayLabel = #26465#30721
      FieldName = 'barcode'
      Size = 16
    end
    object cdsBarcodeSnobarcode_type: TStringField
      DisplayLabel = #26465#30721#31867#22411
      FieldName = 'barcode_type'
      FixedChar = True
      Size = 2
    end
    object cdsBarcodeSnodelete_flag: TBooleanField
      DisplayLabel = #21024#38500#26631#24535
      FieldName = 'delete_flag'
    end
    object cdsBarcodeSnoprint_yn: TBooleanField
      DisplayLabel = #25171#21360#26631#24535
      FieldName = 'print_yn'
    end
    object cdsBarcodeSnoprint_date: TDateTimeField
      DisplayLabel = #25171#21360#26085#26399
      FieldName = 'print_date'
    end
    object cdsBarcodeSnoused_yn: TBooleanField
      DisplayLabel = #20351#29992#26631#24535
      FieldName = 'used_yn'
    end
    object cdsBarcodeSnoprocess_status: TStringField
      DisplayLabel = #36827#24230
      FieldName = 'process_status'
      Size = 8
    end
    object cdsBarcodeSnooperate_user: TStringField
      DisplayLabel = #25805#20316#21592
      FieldName = 'operate_user'
      Size = 8
    end
    object cdsBarcodeSnooperate_user_name: TStringField
      DisplayLabel = #25805#20316#21592
      FieldKind = fkLookup
      FieldName = 'operate_user_name'
      LookupDataSet = dmPub.cdsUser
      LookupKeyFields = 'emp_no'
      LookupResultField = 'emp_sn'
      KeyFields = 'operate_user'
      Size = 30
      Lookup = True
    end
    object cdsBarcodeSnooperate_datetime: TDateTimeField
      DisplayLabel = #25805#20316#26102#38388
      FieldName = 'operate_datetime'
    end
    object cdsBarcodeSnotype_name: TStringField
      Alignment = taCenter
      DisplayLabel = #21830#21697#21517#31216
      DisplayWidth = 10
      FieldKind = fkLookup
      FieldName = 'type_name'
      LookupDataSet = dmPub.cdsItemCode
      LookupKeyFields = 'code'
      LookupResultField = 'name'
      KeyFields = 'barcode_type'
      Size = 40
      Lookup = True
    end
  end
  object dspBarcodeSno: TDataSetProvider
    DataSet = qryBarcodeSno
    Left = 383
    Top = 184
  end
  object qryBarcodeSno: TADOQuery
    Connection = dmPub.adcConn
    DataSource = dsBarcodeSno
    Parameters = <
      item
        Name = 'pid'
        DataType = ftString
        Size = -1
        Value = Null
      end
      item
        Name = 'times'
        DataType = ftString
        Size = -1
        Value = Null
      end>
    SQL.Strings = (
      'SELECT * FROM hp_barcode')
    Left = 383
    Top = 136
  end
end
